home *** CD-ROM | disk | FTP | other *** search
/ FM Towns: Free Software Collection 7 / FM Towns Free Software Collection 7.iso / t_os / komei4 / komei4.exe / ICON / EZZ1.HD6 < prev    next >
Text File  |  1993-06-12  |  3KB  |  204 lines
  1. ds_name        db    'MOJ\EZZ',0
  2.  
  3.  
  4. ; 一番上で､でかい四角に挟まれてアイコンを出している物｡
  5. ; 押されると300に2を書いてMOTO_Eにジャンプ
  6. ; MOTO_Eは今表示されているアイコンの番号を302
  7. ; に書いて､NAO_Eにジャンプ
  8. ; マウスの動きの調節
  9.  
  10. paint_wd:
  11.     SET_P    dt1
  12.     SET_P    dt2
  13.     SET_P    dt3
  14.     call    sp_dt
  15.     mov    word ptr [edx],6
  16.  
  17.     mov    dl,6
  18.     mov    dh,6
  19.     mov    ah,0ch
  20.     call    MOUSE
  21.  
  22. re_paint:
  23.      WD_CLS 0
  24.      BOX boxdt,4
  25.  
  26.     call    dt_icon
  27.     call    u_con
  28.  
  29.     MOZI    mozidt
  30.  
  31.      ret
  32.  
  33. be_called:
  34.     YOMU    ax,300
  35.     cmp    ax,400
  36.     je    neru
  37.     cmp    ax,500
  38.     je    okiru
  39.      ret
  40. neru:
  41.     WD_ERZ 1
  42.     WD_ERZ 0
  43.     WD_LEFT
  44.     ret
  45. okiru:
  46.     WD_WANT
  47.     jmp    re_paint
  48.  
  49. dt_icon:
  50.     call    sub_edi
  51.     dw    0,1,1,1,0,33,6,8,14,30,0
  52. u_con:
  53.     mov    ah,2
  54.     mov    al,0
  55.     call    MOUSE
  56.  
  57.     mov    ah,100
  58.     mov    al,30
  59.     call    komei1
  60.  
  61.     mov    ah,2
  62.     mov    al,1
  63.     call    MOUSE
  64.     ret
  65.  
  66.  
  67. mouse_in:
  68.     cmp    ch,0
  69.     jne    mck1
  70.     ret
  71. mck1:
  72.     call    mou_dt
  73.     mov    [edi],cx
  74.  
  75.     MOU    boxdt,4
  76.     cmp    bx,1
  77.     je    mck2
  78.     ret
  79. mck2:
  80.     cmp    ax,1
  81.     je    ue_sita
  82.     cmp    ax,2
  83.     je    migi
  84.     cmp    ax,3
  85.     je    rara
  86.     cmp    ax,4
  87.     je    speed
  88.     ret
  89. ue_sita:
  90.     KAKU    word ptr 300,5
  91.     GO_P    dt3        ;nao_e = front col get
  92.  
  93. migi:
  94.     KAKU    word ptr 300,6
  95.     GO_P    dt3        ;nao_e = front col get
  96.  
  97.  
  98. rara:
  99.     KAKU    word ptr 300,1
  100.     CALL_P    dt1        ;f_col = front col get
  101.  
  102.     KAKU    word ptr 300,3  ;i_mk
  103.     CALL_P    dt2        ;box_ful
  104.  
  105.     KAKU    word ptr 300,4  ;NAO_E     box_ful
  106.     CALL_P    dt3
  107.     ret
  108. speed:
  109.     call    mozidt
  110.     mov    al,[edi+14]
  111.     sub    al,30h
  112.     call    mou_dt
  113.     mov    cx,[edi]
  114.     cmp    ch,1
  115.     je    hayai
  116.  
  117.     cmp    al,9
  118.     jb    noro1
  119.     ret
  120. noro1:
  121.     inc    al
  122. noro2:
  123.     call    mozidt
  124.     mov    dh,al
  125.     mov    dl,al
  126.     add    al,30h
  127.     mov    [edi+14],al
  128.  
  129.     mov    ah,0ch
  130.     call    MOUSE
  131.  
  132.     call    kesu_ms
  133.  
  134.     jmp    re_paint
  135. hayai:
  136.     cmp    al,1
  137.     ja    haya2
  138.     ret
  139. haya2:
  140.     dec    al
  141.     jmp    noro2
  142.  
  143. sp_dt:
  144.     call    sub_edx
  145.     dw    6
  146. mou_dt:
  147.     call    sub_edi
  148.     dw    0
  149.  
  150. kesu_ms:
  151.     M_KESUMS
  152.  
  153.  
  154. dt1:
  155.     call    sub_edi
  156.     dw    0
  157.     db    'F_COL',0
  158.  
  159. dt2:
  160.     call    sub_edi
  161.     dw    0
  162.     db    'I_MK',0
  163.  
  164. dt3:
  165.     call    sub_edi
  166.     dw    0
  167.     db    'NAO_E',0
  168.  
  169.  
  170. p_call:
  171.     M_P_CALL
  172. p_set:
  173.     M_P_SET
  174.  
  175. look_me:
  176.      call sub_esi         ; esi 固定です｡
  177.      dd 0,0
  178.      dw     1    ; ここが 1 の物は open start です｡
  179.          dw      0
  180.          dw  33,33*4,256+60,132,15,0,0,0
  181.  
  182.  
  183.  
  184. boxdt:
  185.     call sub_edi                               ; edi 固定です｡
  186.         dw    4,33,33,0,0,0,33,15,15,0
  187.  
  188.  
  189. ; [count][sz_x][sz_y][off_x][off_y][+x][+y][f_col][b_col][s_no]
  190.  
  191.  
  192. mozidt:
  193.     call sub_edi
  194.            dw    0        ;screen_no
  195.            dw    15      ; mozi_color
  196.            dw    14+2      ; 書き出し位置  x
  197.            dw    33*3+3      ;          y
  198.            dw    25      ; next offset x
  199.            dw    0      ; next offset y
  200.     
  201.                dw   1      ; gyo suu
  202.                    db    '6',0
  203.  
  204.